/*

Dofile: table1.do 

Date: Dec. 10, 2016 
Aim: Present summary statistics of the main variables 

Input: base_for_reg.dta 
Output: table1.xls 
Reported in the paper: "Table 1 – Summary statistics"

*/  

cd $datapath
use base_for_reg, clear 

tabstat luv type dum_hines tarif ldistw lgdpc linvemtr linveatr inter_tarif inter_lgdpc interdum_hines inter_ldistw inter_linveatr inter_linvemtr if tarif!=., stat( mean sd )
matrix a = r(StatTotal) 
putexcel A4=matrix(a)  using $resultpath/table1.xls, replace 
